Eagles Nest BBS 8/Eagles_Nest_Mac_Collection_Disc_8.TOAST/Developer Environments/AdaV401#3/AdaV3/test/SIMPLE.ADA/SIMPLE.ADA

Text File | 1987-12-04 | 330 b | 14 lines | [TEXT/????]

--           Test program for Meridian Ada compiler.            --
--        This program prints the numbers from 1 to 10.         --
--      Copyright (C) 1986 Meridian Software Systems, Inc.      --

with ada_io; use ada_io;
procedure simple is
begin
  for i in 1..10 loop
    put(i);
    put(' ');
  end loop;
  new_line;
end;